**** PROGRAM FILE FOR SI5: Comparison of Agency Panels ****
 
 




 * OPEN "HISTORICAL BUDGET" DATABASE CONTAINING NEW VARIABLES * 
 
use data_final.dta, clear 

**********************************************************************************************************************************************************************************************************
**********************************************************************************************************************************************************************************************************
**********************************************************************************************************************************************************************************************************
**********************************************************************************************************************************************************************************************************
**********************************************************************************************************************************************************************************************************
**********************************************************************************************************************************************************************************************************




*** DECLARE DATABASE AS A PANEL (AGENCY ID * FISCAL YEAR): 

xtset agenid fyear, yearly

*
*
*



*** I. ESTIMATE EFFECT OF BAA REFORMS ON BUDGETARY CONTROL [BUDGETARY GROWTH AS DEPENDENT VARIABLE] ***



*** ESTIMATE EXECUTIVE BUDGET CONTROL USING ABADIE'S SEMI-PARAMETRIC PROPENSITY SCORE WEIGHTED ESTIMATOR OF HETEROGENEOUS AVERAGE TREATMENT EFFECTS ***

absdid execbudchangetot, tvar(bureauofbudget)  xvar(presidentparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
agencyheadstability realgnpgrowth realfeddeficitgnp lnagencyage) sle
estimate store ateect
*
absdid execbudchangetot, tvar(bureauofbudget)  xvar(presidentparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
agencyheadstability realgnpgrowth realfeddeficitgnp lnagencyage) yxvar(executiveagency) sle
estimate store ecti

lincomest _cons + executiveagency
estimate store ecte
*
*
*
absdid execbudchangereg, tvar(bureauofbudget)  xvar(presidentparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
agencyheadstability realgnpgrowth realfeddeficitgnp lnagencyage) sle
estimate store ateecr
*
absdid execbudchangereg, tvar(bureauofbudget)  xvar(presidentparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
agencyheadstability realgnpgrowth realfeddeficitgnp lnagencyage) yxvar(executiveagency) sle
estimate store ecri

lincomest _cons + executiveagency
estimate store ecre

*
*
*
*
*** ESTIMATE CONGRESSIONAL BUDGET CONTROL USING ABADIE'S SEMI-PARAMETRIC PROPENSITY SCORE WEIGHTED ESTIMATOR OF HETEROGENEOUS AVERAGE TREATMENT EFFECTS ***

absdid congbudchangetot, tvar(bureauofbudget)  xvar(housemajorityparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
appropcommchairstabilityest realgnpgrowth realfeddeficitgnp lnagencyage) sle
estimate store atecct
*
absdid congbudchangetot, tvar(bureauofbudget)  xvar(housemajorityparty  presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
appropcommchairstabilityest realgnpgrowth realfeddeficitgnp lnagencyage) yxvar(executiveagency) sle
estimate store ccti

lincomest _cons + executiveagency
estimate store ccte
*
*
*
absdid congbudchangereg, tvar(bureauofbudget)  xvar(housemajorityparty  presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
appropcommchairstabilityest realgnpgrowth realfeddeficitgnp lnagencyage) sle
estimate store ateccr

*
absdid congbudchangereg, tvar(bureauofbudget)  xvar(housemajorityparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
appropcommchairstabilityest realgnpgrowth realfeddeficitgnp lnagencyage) yxvar(executiveagency) sle
estimate store ccri

lincomest _cons + executiveagency
estimate store ccre

*** Creating Coefficient Plots for Budget Control Models***
*** Figure 1A ***
/*coefplot (ateect, rename(_cons="All Agencies (ATE)")) ///
         (ecte, rename((1)="Executive Agencies (ATE: E)")) ///
         (ecti, keep (_cons) rename(_cons="Independent Agencies (ATE: I)")) ///
		 (ecti, drop (_cons) rename(executiveagency= "Difference (ATE: E - I)")) ///
		  ,  bylabel(Total Budget) ///
		  ||                       ///
		 (ateecr, rename(_cons="All Agencies (ATE)")) ///
         (ecre, rename((1)="Executive Agencies (ATE: E)")) ///
         (ecri, keep (_cons) rename(_cons="Independent Agencies (ATE: I)")) ///
		 (ecri, drop (_cons) rename(executiveagency= "Difference (ATE: E - I)")) ///
		  , bylabel(Regular Budget) ///
          ||, ///
          nokey xline (0, lcolor(black) lwidth(thin) lpattern(dash)) grid(w) ciopts(recast(rcap)) ///
		  order ("All Agencies (ATE)" "Executive Agencies (ATE: E)" "Independent Agencies (ATE: I)" "Difference (ATE: E - I)") /// 
		  byopts(title ("Treatment Effects of BACA on Executive Budget Control", span)) 
		  
graph save "C:\Users\Jin\Dropbox\BACA paper\Graphs\gph\Figure1A.gph", replace
graph export "C:\Users\Jin\Dropbox\BACA paper\Graphs\Figure1A.png", replace

*** Figure 1B ***
coefplot (atecct, rename(_cons="All Agencies (ATE)")) ///
         (ccte, rename((1)="Executive Agencies (ATE: E)")) ///
         (ccti, keep (_cons) rename(_cons="Independent Agencies (ATE: I)")) ///
		 (ccti, drop (_cons) rename(executiveagency= "Difference (ATE: E - I)")) ///
		  ,  bylabel(Total Budget) ///
		  ||                       ///
		 (ateccr, rename(_cons="All Agencies (ATE)")) ///
         (ccre, rename((1)="Executive Agencies (ATE: E)")) ///
         (ccri, keep (_cons) rename(_cons="Independent Agencies (ATE: I)")) ///
		 (ccri, drop (_cons) rename(executiveagency= "Difference (ATE: E - I)")) ///
		  , bylabel(Regular Budget) ///
          ||, ///
          nokey xline (0, lcolor(black) lwidth(thin) lpattern(dash)) grid(w) ciopts(recast(rcap)) ///
		  order ("All Agencies (ATE)" "Executive Agencies (ATE: E)" "Independent Agencies (ATE: I)" "Difference (ATE: E - I)") /// 
		  byopts(title ("Treatment Effects of BACA on Legislative Budget Control", span)) 
		  
graph save "C:\Users\Jin\Dropbox\BACA paper\Graphs\gph\Figure1B.gph", replace
graph export "C:\Users\Jin\Dropbox\BACA paper\Graphs\Figure1B.png", replace */


*** Figure 1 ***
coefplot (ateect, rename(_cons="Executive Estimates (ATE)") \ ///
			atecct, rename(_cons="Congressional Appropriations (ATE)")) ///
		 (ecte, rename((1)="Executive Estimates (ATE: E)") \ ///
			ccte, rename((1)="Congressional Appropriations (ATE: E)")) ///
		 (ecti, keep (_cons) rename(_cons="Executive Estimates (ATE: I)") \ ///
			ccti, keep (_cons) rename(_cons="Congressional Appropriations (ATE: I)")) ///
		  ,  bylabel(Total Budget)  ///
		  ||                       ///
		 (ateecr, rename(_cons="Executive Estimates (ATE)")\ ///
			ateccr, rename(_cons="Congressional Appropriations (ATE)")) ///
		 (ecre, rename((1)="Executive Estimates (ATE: E)")\ ///
			ccre, rename((1)="Congressional Appropriations (ATE: E)")) ///
		 (ecri, keep (_cons) rename(_cons="Executive Estimates (ATE: I)")\ ///
			ccri, keep (_cons) rename(_cons="Congressional Appropriations (ATE: I)")) ///
		  , bylabel(Regular Budget)   ///
		  || ,                        ///
          nokey xline (0, lcolor(black) lwidth(thin) lpattern(dash)) grid(w) ///
		  ciopts(recast(rcap)) nooffsets msize(medsmall) ///
		  order("Executive Estimates (ATE)""Congressional Appropriations (ATE)". ///
		  "Executive Estimates (ATE: E)" "Congressional Appropriations (ATE: E)". ///
		  "Executive Estimates (ATE: I)" "Congressional Appropriations (ATE: I)") ///
		  byopts(note("Point Estimates and Corresponding 95% Confidence Intervals", j(right) place(seast) size(vsmall)) ///
		   title("Figure 1. 1921 Budget and Accounting Act Average Treatment Effects on" "Executive and Legislative Budget Control", size(med)span)) 
		  
graph save "C:\Users\Jin\Dropbox\BACA paper\Graphs\Governance\gph\Figure1.gph", replace
graph export "C:\Users\Jin\Dropbox\BACA paper\Graphs\Governance\Figure1.png", replace
		  
		  
********************************************************************************************************************************************************************
********************************************************************************************************************************************************************
********************************************************************************************************************************************************************
		  
		  
		  
*** II. ESTIMATE DIFFERENCE-IN DIFFERENCES MODELS USING BUDGETARY STABILITY IN NATURAL LOGARITHMS AS DEPENDENT VARIABLE ***



*** ESTIMATE EFFECT OF BAA REFORMS ON EXECUTIVE BUDGET STABILITY USING ABADIE'S SEMI-PARAMETRIC PROPENSITY SCORE WEIGHTED ESTIMATOR OF HETEROGENEOUS AVERAGE TREATMENT EFFECTS ***

absdid lnexecbudstabletot, tvar(bureauofbudget)  xvar(presidentparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
agencyheadstability realgnpgrowth realfeddeficitgnp lnagencyage) sle
estimate store ateest
*
absdid lnexecbudstabletot, tvar(bureauofbudget)  xvar(presidentparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
agencyheadstability realgnpgrowth realfeddeficitgnp lnagencyage)  yxvar(executiveagency) sle
estimate store esti

lincomest _cons + executiveagency
estimate store este

*
*
*
absdid lnexecbudstablereg, tvar(bureauofbudget)  xvar(presidentparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
agencyheadstability realgnpgrowth realfeddeficitgnp lnagencyage) sle
estimate store ateesr
*
absdid lnexecbudstablereg, tvar(bureauofbudget)  xvar(presidentparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
agencyheadstability realgnpgrowth realfeddeficitgnp lnagencyage)  yxvar(executiveagency) sle
estimate store esri

lincomest _cons + executiveagency
estimate store esre

*
*
*

*** ESTIMATE CONGRESSIONAL BUDGET STABILITY USING ABADIE'S SEMI-PARAMETRIC PROPENSITY SCORE WEIGHTED ESTIMATOR OF HETEROGENEOUS AVERAGE TREATMENT EFFECTS ***

absdid lncongbudstabletot, tvar(bureauofbudget)  xvar(housemajorityparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
appropcommchairstabilityest realgnpgrowth realfeddeficitgnp lnagencyage) sle
estimate store atecst
*
absdid lncongbudstabletot, tvar(bureauofbudget)  xvar(housemajorityparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
appropcommchairstabilityest realgnpgrowth realfeddeficitgnp lnagencyage)  yxvar(executiveagency) sle
estimate store csti

lincomest _cons + executiveagency
estimate store cste
*
*
*
absdid lncongbudstablereg, tvar(bureauofbudget)  xvar(housemajorityparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
appropcommchairstabilityest realgnpgrowth realfeddeficitgnp lnagencyage) sle
estimate store atecsr
*
absdid lncongbudstablereg, tvar(bureauofbudget)  xvar(housemajorityparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
appropcommchairstabilityest realgnpgrowth realfeddeficitgnp lnagencyage)  yxvar(executiveagency) sle
estimate store csri

lincomest _cons + executiveagency
estimate store csre

*** Creating Coefficient Plots for Budget Stability Models***
*** Figure 2A ***
/* coefplot (ateest, rename(_cons="All Agencies (ATE)")) ///
         (este, rename((1)="Executive Agencies (ATE: E)")) ///
         (esti, keep (_cons) rename(_cons="Independent Agencies (ATE: I)")) ///
		 (esti, drop (_cons) rename(executiveagency= "Difference (ATE: E - I)")) ///
		  ,  bylabel(Total Budget) ///
		  ||                       ///
		 (ateesr, rename(_cons="All Agencies (ATE)")) ///
         (esre, rename((1)="Executive Agencies (ATE: E)")) ///
         (esri, keep (_cons) rename(_cons="Independent Agencies (ATE: I)")) ///
		 (esri, drop (_cons) rename(executiveagency= "Difference (ATE: E - I)")) ///
		  , bylabel(Regular Budget) ///
          ||, ///
          nokey xline (0, lcolor(black) lwidth(thin) lpattern(dash)) grid(w) ciopts(recast(rcap)) ///
		  order ("All Agencies (ATE)" "Executive Agencies (ATE: E)" "Independent Agencies (ATE: I)" "Difference (ATE: E - I)") /// 
		  byopts(title ("Treatment Effects of BACA on Executive Budget Stability", span)) 
		  
graph save "C:\Users\Jin\Dropbox\BACA paper\Graphs\gph\Figure2A.gph", replace
graph export "C:\Users\Jin\Dropbox\BACA paper\Graphs\Figure2A.png", replace

*** Figure 2B ***
coefplot (atecst, rename(_cons="All Agencies (ATE)")) ///
         (cste, rename((1)="Executive Agencies (ATE: E)")) ///
         (csti, keep (_cons) rename(_cons="Independent Agencies (ATE: I)")) ///
		 (csti, drop (_cons) rename(executiveagency= "Difference (ATE: E - I)")) ///
		  ,  bylabel(Total Budget) ///
		  ||                       ///
		 (atecsr, rename(_cons="All Agencies (ATE)")) ///
         (csre, rename((1)="Executive Agencies (ATE: E)")) ///
         (csri, keep (_cons) rename(_cons="Independent Agencies (ATE: I)")) ///
		 (csri, drop (_cons) rename(executiveagency= "Difference (ATE: E - I)")) ///
		  , bylabel(Regular Budget) ///
          ||, ///
          nokey xline (0, lcolor(black) lwidth(thin) lpattern(dash)) grid(w) ciopts(recast(rcap)) ///
		  order ("All Agencies (ATE)" "Executive Agencies (ATE: E)" "Independent Agencies (ATE: I)" "Difference (ATE: E - I)") /// 
		  byopts(title ("Treatment Effects of BACA on Legislative Budget Stability", span)) 
		  
graph save "C:\Users\Jin\Dropbox\BACA paper\Graphs\gph\Figure2B.gph", replace
graph export "C:\Users\Jin\Dropbox\BACA paper\Graphs\Figure2B.png", replace */

*** Figure 2 ***
coefplot (ateest, rename(_cons="Executive Estimates (ATE)")\ ///
			atecst, rename(_cons="Congressional Appropriations (ATE)")) ///
		 (este, rename((1)="Executive Estimates (ATE: E)")\ ///
				cste, rename((1)="Congressional Appropriations (ATE: E)")) ///
		 (esti, keep (_cons) rename(_cons="Executive Estimates (ATE: I)")\ ///
			csti, keep (_cons) rename(_cons="Congressional Appropriations (ATE: I)")) ///
		  ,  bylabel(Total Budget) ///
		  ||                       ///
		 (ateesr, rename(_cons="Executive Estimates (ATE)")\ ///
			atecsr, rename(_cons="Congressional Appropriations (ATE)")) ///
		 (esre, rename((1)="Executive Estimates (ATE: E)")\ ///
			csre, rename((1)="Congressional Appropriations (ATE: E)")) ///
		 (esri, keep (_cons) rename(_cons="Executive Estimates (ATE: I)")\ ///
			csri, keep (_cons) rename(_cons="Congressional Appropriations (ATE: I)")) ///
		  , bylabel(Regular Budget) ///
          ||, ///
          nokey xline (0, lcolor(black) lwidth(thin) lpattern(dash)) grid(w)  ///
		  ciopts(recast(rcap)) nooffsets msize(medsmall)                      ///
		  order("Executive Estimates (ATE)""Congressional Appropriations (ATE)". ///
		  "Executive Estimates (ATE: E)" "Congressional Appropriations (ATE: E)". ///
		  "Executive Estimates (ATE: I)" "Congressional Appropriations (ATE: I)") ///
		  byopts(note("Point Estimates and Corresponding 95% Confidence Intervals", j(right) place(seast) size(vsmall)) ///
		  title ("Figure 2. 1921 Budget and Accounting Act Average Treatment Effects on" "Executive and Legislative Budget Stability", size(med)span)) 
		  
graph save "C:\Users\Jin\Dropbox\BACA paper\Graphs\Governance\gph\Figure2.gph", replace
graph export "C:\Users\Jin\Dropbox\BACA paper\Graphs\Governance\Figure2.png", replace


	  
********************************************************************************************************************************************************************
********************************************************************************************************************************************************************
********************************************************************************************************************************************************************
		  


*** III. ESTIMATE EFFECT OF BAA REFORMS ON EXECUTIVE-LEGISLATIVE BUDGETARY COHERENCE IN NATURAL LOGARITHMS (+1) AS DEPENDENT VARIABLE ***


*** ESTIMATE EXECUTIVE-CONGRESSIONAL BUDGET COHERENCE USING ABADIE'S SEMI-PARAMETRIC PROPENSITY SCORE WEIGHTED ESTIMATOR OF HETEROGENEOUS AVERAGE TREATMENT EFFECTS ***

absdid ln1execbudcoherencetot, tvar(bureauofbudget)  xvar(presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
unifiedpartygovt sharedtenureest realgnpgrowth realfeddeficitgnp lnagencyage) sle 
estimate store atebct
*
absdid ln1execbudcoherencetot, tvar(bureauofbudget)  xvar(presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
unifiedpartygovt sharedtenureest realgnpgrowth realfeddeficitgnp lnagencyage) yxvar(executiveagency) sle
estimate store bcti

lincomest _cons + executiveagency
estimate store bcte
*
*
*
absdid ln1execbudcoherencereg, tvar(bureauofbudget)  xvar(presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
unifiedpartygovt sharedtenureest realgnpgrowth realfeddeficitgnp lnagencyage) sle
estimate store atebcr
*
absdid ln1execbudcoherencereg, tvar(bureauofbudget)  xvar(presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
unifiedpartygovt sharedtenureest realgnpgrowth realfeddeficitgnp lnagencyage) yxvar(executiveagency) sle
estimate store bcri

lincomest _cons + executiveagency
estimate store bcre
*
*
*
*** Creating Coefficient Plots for Budget Coherence Models***
*** Figure 3 ***
coefplot (atebct, rename(_cons="ATE: All Agencies")) ///
		 (bcte, rename((1)="ATE: Executive Agencies")) ///
		 (bcti, keep (_cons) rename(_cons="ATE: Independent Agencies")) ///
		  ,  bylabel(Total Budget) ///
		  ||                       ///
		 (atebcr, rename(_cons="ATE: All Agencies")) ///
		 (bcre, rename((1)="ATE: Executive Agencies")) ///
		 (bcri, keep (_cons) rename(_cons="ATE: Independent Agencies")) ///
		  , bylabel(Regular Budget) ///
          ||, ///
          nokey xline (0, lcolor(black) lwidth(thin) lpattern(dash)) grid(w) ciopts(recast(rcap)) ///
		  nooffsets msize(medsmall) ///
		  byopts(note("Point Estimates and Corresponding 95% Confidence Intervals", j(right) place(seast) size(vsmall)) ///
		  title ("Figure 3. 1921 Budget and Accounting Act Average Treatment Effects on" "Executive-Legislative Budget Coherence", size(med)span)) 
		  
graph save "C:\Users\Jin\Dropbox\BACA paper\Graphs\Governance\gph\Figure3.gph", replace
graph export "C:\Users\Jin\Dropbox\BACA paper\Graphs\Governance\Figure3.png", replace

	  
********************************************************************************************************************************************************************
********************************************************************************************************************************************************************
********************************************************************************************************************************************************************
		  


*** IV. ESTIMATE EFFECTS OF BAA REFORMS ON BUDGETARY CONTROL [BUDGETARY GROWTH AS DEPENDENT VARIABLE] ***


*** ESTIMATE EXECUTIVE BUDGET CONTROL USING SAMPLE EXCLUDING POST-BACA AGENCIES***

absdid execbudchangetot if postbacaagencies==0, tvar(bureauofbudget)  xvar(presidentparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
agencyheadstability realgnpgrowth realfeddeficitgnp lnagencyage) sle
estimate store ateectt
*
*
absdid execbudchangetot if postbacaagencies==0, tvar(bureauofbudget)  xvar(presidentparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
agencyheadstability realgnpgrowth realfeddeficitgnp lnagencyage) yxvar(executiveagency) sle
*
estimate store ectit

lincomest _cons + executiveagency
estimate store ectet
*
*
*
absdid execbudchangereg if postbacaagencies==0, tvar(bureauofbudget)  xvar(presidentparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
agencyheadstability realgnpgrowth realfeddeficitgnp lnagencyage) sle
estimate store ateecrt
*
*
absdid execbudchangereg if postbacaagencies==0, tvar(bureauofbudget)  xvar(presidentparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
agencyheadstability realgnpgrowth realfeddeficitgnp lnagencyage) yxvar(executiveagency) sle
*
estimate store ecrit

lincomest _cons + executiveagency
estimate store ecret

*
*
*
*
*** ESTIMATE CONGRESSIONAL BUDGET CONTROL USING SAMPLE EXCLUDING POST-BACA AGENCIES***

absdid congbudchangetot if postbacaagencies==0, tvar(bureauofbudget)  xvar(housemajorityparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
appropcommchairstabilityest realgnpgrowth realfeddeficitgnp lnagencyage) sle
estimate store atecctt
*
*
absdid congbudchangetot if postbacaagencies==0, tvar(bureauofbudget)  xvar(housemajorityparty  presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
appropcommchairstabilityest realgnpgrowth realfeddeficitgnp lnagencyage) yxvar(executiveagency) sle
*
estimate store cctit

lincomest _cons + executiveagency
estimate store cctet
*
*
*
absdid congbudchangereg if postbacaagencies==0, tvar(bureauofbudget)  xvar(housemajorityparty  presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
appropcommchairstabilityest realgnpgrowth realfeddeficitgnp lnagencyage) sle
estimate store ateccrt
*

*
absdid congbudchangereg if postbacaagencies==0, tvar(bureauofbudget)  xvar(housemajorityparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
appropcommchairstabilityest realgnpgrowth realfeddeficitgnp lnagencyage) yxvar(executiveagency) sle
*
estimate store ccrit

lincomest _cons + executiveagency
estimate store ccret

	  
********************************************************************************************************************************************************************
********************************************************************************************************************************************************************
********************************************************************************************************************************************************************
		  
		  

*** V. ESTIMATE EFFECTS OF BAA REFORMS ON BUDGETARY STABILITY IN NATURAL LOGARITHMS AS DEPENDENT VARIABLE ***


*** ESTIMATE EXECUTIVE BUDGET STABILITY USING SAMPLE EXCLUDING POST-BACA AGENCIES***

absdid lnexecbudstabletot if postbacaagencies==0, tvar(bureauofbudget)  xvar(presidentparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
agencyheadstability realgnpgrowth realfeddeficitgnp lnagencyage) sle
estimate store ateestt
*
*
absdid lnexecbudstabletot if postbacaagencies==0, tvar(bureauofbudget)  xvar(presidentparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
agencyheadstability realgnpgrowth realfeddeficitgnp lnagencyage)  yxvar(executiveagency) sle
*
estimate store estit

lincomest _cons + executiveagency
estimate store estet

*
*
*
absdid lnexecbudstablereg if postbacaagencies==0, tvar(bureauofbudget)  xvar(presidentparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
agencyheadstability realgnpgrowth realfeddeficitgnp lnagencyage) sle
estimate store ateesrt
*
*
absdid lnexecbudstablereg if postbacaagencies==0, tvar(bureauofbudget)  xvar(presidentparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
agencyheadstability realgnpgrowth realfeddeficitgnp lnagencyage)  yxvar(executiveagency) sle
*
estimate store esrit

lincomest _cons + executiveagency
estimate store esret

*
*
*

*** ESTIMATE CONGRESSIONAL BUDGET STABILITY USING SAMPLE EXCLUDING POST-BACA AGENCIES***

absdid lncongbudstabletot if postbacaagencies==0, tvar(bureauofbudget)  xvar(housemajorityparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
appropcommchairstabilityest realgnpgrowth realfeddeficitgnp lnagencyage) sle
estimate store atecstt
*
absdid lncongbudstabletot if postbacaagencies==0, tvar(bureauofbudget)  xvar(housemajorityparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
appropcommchairstabilityest realgnpgrowth realfeddeficitgnp lnagencyage)  yxvar(executiveagency) sle
estimate store cstit

lincomest _cons + executiveagency
estimate store cstet
*
*
*
absdid lncongbudstablereg if postbacaagencies==0, tvar(bureauofbudget)  xvar(housemajorityparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
appropcommchairstabilityest realgnpgrowth realfeddeficitgnp lnagencyage) sle
estimate store atecsrt
*
absdid lncongbudstablereg if postbacaagencies==0, tvar(bureauofbudget)  xvar(housemajorityparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
appropcommchairstabilityest realgnpgrowth realfeddeficitgnp lnagencyage)  yxvar(executiveagency) sle
estimate store csrit

lincomest _cons + executiveagency
estimate store csret

	  
********************************************************************************************************************************************************************
********************************************************************************************************************************************************************
********************************************************************************************************************************************************************
		  
		  

*** VI. ESTIMATE EFFECTS OF BAA REFORMS ON EXECUTIVE-LEGISLATIVE BUDGETARY COHERENCE IN NATURAL LOGARITHMS (+1) AS DEPENDENT VARIABLE ***


*** ESTIMATE EXECUTIVE-CONGRESSIONAL BUDGET COHERENCE USING SAMPLE EXCLUDING POST-BACA AGENCIES ***

absdid ln1execbudcoherencetot if postbacaagencies==0, tvar(bureauofbudget)  xvar(presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
unifiedpartygovt sharedtenureest realgnpgrowth realfeddeficitgnp lnagencyage) sle 
estimate store atebctt
*
absdid ln1execbudcoherencetot if postbacaagencies==0, tvar(bureauofbudget)  xvar(presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
unifiedpartygovt sharedtenureest realgnpgrowth realfeddeficitgnp lnagencyage) yxvar(executiveagency) sle
estimate store bctit

lincomest _cons + executiveagency
estimate store bctet
*
*
*
absdid ln1execbudcoherencereg if postbacaagencies==0, tvar(bureauofbudget)  xvar(presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
unifiedpartygovt sharedtenureest realgnpgrowth realfeddeficitgnp lnagencyage) sle
estimate store atebcrt
*
absdid ln1execbudcoherencereg if postbacaagencies==0, tvar(bureauofbudget)  xvar(presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
unifiedpartygovt sharedtenureest realgnpgrowth realfeddeficitgnp lnagencyage) yxvar(executiveagency) sle
estimate store bcrit

lincomest _cons + executiveagency
estimate store bcret
*
*
*


********************************************************************************************************************************************************************
********************************************************************************************************************************************************************
********************************************************************************************************************************************************************
		  
		  

*** VII. ESTIMATE EFFECTS OF BAA REFORMS ON BUDGETARY CONTROL [USING BUDGETARY GROWTH AS DEPENDENT VARIABLE] ***


*** ESTIMATE EXECUTIVE BUDGET CONTROL USING SAMPLE EXCLUDING ONE-SIDED AGENCIES***

absdid execbudchangetot if onesidedagencies==0, tvar(bureauofbudget)  xvar(presidentparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
agencyheadstability realgnpgrowth realfeddeficitgnp lnagencyage) sle 
estimate store ateectp
*
*
absdid execbudchangetot if onesidedagencies==0, tvar(bureauofbudget)  xvar(presidentparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
agencyheadstability realgnpgrowth realfeddeficitgnp lnagencyage) yxvar(executiveagency) sle
*
estimate store ectip

lincomest _cons + executiveagency
estimate store ectep
*
*
*
absdid execbudchangereg if onesidedagencies==0, tvar(bureauofbudget)  xvar(presidentparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
agencyheadstability realgnpgrowth realfeddeficitgnp lnagencyage) sle
estimate store ateecrp
*
*
absdid execbudchangereg if onesidedagencies==0, tvar(bureauofbudget)  xvar(presidentparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
agencyheadstability realgnpgrowth realfeddeficitgnp lnagencyage) yxvar(executiveagency) sle
estimate store ecrip

lincomest _cons + executiveagency
estimate store ecrep

*
*
*
*
*** ESTIMATE CONGRESSIONAL BUDGET CONTROL USING SAMPLE EXCLUDING ONE-SIDED AGENCIES***

absdid congbudchangetot if onesidedagencies==0, tvar(bureauofbudget)  xvar(housemajorityparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
appropcommchairstabilityest realgnpgrowth realfeddeficitgnp lnagencyage) sle
estimate store atecctp
*
*
absdid congbudchangetot if onesidedagencies==0, tvar(bureauofbudget)  xvar(housemajorityparty  presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
appropcommchairstabilityest realgnpgrowth realfeddeficitgnp lnagencyage) yxvar(executiveagency) sle
*
estimate store cctip

lincomest _cons + executiveagency
estimate store cctep
*
*
*
absdid congbudchangereg if onesidedagencies==0, tvar(bureauofbudget)  xvar(housemajorityparty  presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
appropcommchairstabilityest realgnpgrowth realfeddeficitgnp lnagencyage) sle
estimate store ateccrp
*

*
absdid congbudchangereg if onesidedagencies==0, tvar(bureauofbudget)  xvar(housemajorityparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
appropcommchairstabilityest realgnpgrowth realfeddeficitgnp lnagencyage) yxvar(executiveagency) sle

estimate store ccrip

lincomest _cons + executiveagency
estimate store ccrep

*** Creating Appendix Plots for Budget Control Models ***
*** Figure SI-5A: Executive Budget Control Models: Comparison of Alternative Agency Panels***
coefplot (ateect, rename(_cons="ATE (Full Panel)") \ ///
			ateectt, rename(_cons="ATE (Alt. Panel 1)") \ ///
			ateectp, rename(_cons="ATE (Alt. Panel 2)")) ///
         (ecte, rename((1)="ATE: E (Full Panel)") \ ///
			ectet, rename((1)="ATE: E (Alt. Panel 1)")\  ///
			ectep, rename((1)="ATE: E (Alt. Panel 2)")) ///
         (ecti, drop(executiveagency) rename(_cons="ATE: I (Full Panel)") \ ///
			ectit, drop(executiveagency) rename(_cons="ATE: I (Alt. Panel 1)") \  ///
			ectip, drop(executiveagency) rename(_cons="ATE: I (Alt. Panel 2)")) ///
		  ,  bylabel(Total Budget) ///
		  ||                       ///
		 (ateecr, rename(_cons="ATE (Full Panel)") \ ///
			ateecrt, rename(_cons="ATE (Alt. Panel 1)") \ ///
			ateecrp, rename(_cons="ATE (Alt. Panel 2)")) ///
         (ecre, rename((1)="ATE: E (Full Panel)") \ ///
			ecret, rename((1)="ATE: E (Alt. Panel 1)") \ ///
			ecrep, rename((1)="ATE: E (Alt. Panel 2)")) ///
         (ecri, drop(executiveagency) rename(_cons="ATE: I (Full Panel)") \ ///
			ecrit, drop(executiveagency) rename(_cons="ATE: I (Alt. Panel 1)") \ ///
			ecrip, drop(executiveagency) rename(_cons="ATE: I (Alt. Panel 2)")) ///
		  ,  bylabel(Regular Budget) ///
		  ||,                        ///
          nokey xline (0, lcolor(black) lwidth(thin) lpattern(dash)) grid(w) ciopts(recast(rcap)) ///
		  nooffsets msize(medsmall) ///
		  order("ATE (Full Panel)" "ATE (Alt. Panel 1)" "ATE (Alt. Panel 2)" . ///
                "ATE: E (Full Panel)" "ATE: E (Alt. Panel 1)" "ATE: E (Alt. Panel 2)" . ///
                "ATE: I (Full Panel)" "ATE: I (Alt. Panel 1)" "ATE: I (Alt. Panel 2)" ) ///
		  byopts(note("Point Estimates and Corresponding 95% Confidence Intervals", j(right) place(seast) size(vsmall)) ///
		  title ("Figure SI-5A. 1921 Budget and Accounting Act Average Treatment Effects on" ///
		  "Executive Budget Control: Comparison of Alternative Agency Panels", size (med)span)) 
		  
graph save "C:\Users\Jin\Dropbox\BACA paper\Graphs\Governance\gph\Figure SI-5A.gph", replace
graph export "C:\Users\Jin\Dropbox\BACA paper\Graphs\Governance\Figure SI-5A.png", replace		  

*** Figure SI-5B: Legislative Budget Control Models: Comparison of Alternative Agency Panels***
coefplot (atecct, rename(_cons="ATE (Full Panel)")\ ///
			atecctt, rename(_cons="ATE (Alt. Panel 1)")\ ///
		 	atecctp, rename(_cons="ATE (Alt. Panel 2)")) ///
         (ccte, rename((1)="ATE: E (Full Panel)")\ ///
			cctet, rename((1)="ATE: E (Alt. Panel 1)")\ ///
			cctep, rename((1)="ATE: E (Alt. Panel 2)")) ///
         (ccti, drop(executiveagency) rename(_cons="ATE: I (Full Panel)")\ ///
			cctit, drop(executiveagency) rename(_cons="ATE: I (Alt. Panel 1)")\ ///
			cctip, drop(executiveagency) rename(_cons="ATE: I (Alt. Panel 2)")) ///
		  ,  bylabel(Total Budget) ///
		  ||                       ///
		 (ateccr, rename(_cons="ATE (Full Panel)")\ ///
			ateccrt, rename(_cons="ATE (Alt. Panel 1)")\ ///
			ateccrp, rename(_cons="ATE (Alt. Panel 2)")) ///
         (ccre, rename((1)="ATE: E (Full Panel)")\ ///
			ccret, rename((1)="ATE: E (Alt. Panel 1)")\ ///
			ccrep, rename((1)="ATE: E (Alt. Panel 2)")) ///
         (ccri, drop(executiveagency) rename(_cons="ATE: I (Full Panel)")\ ///
			ccrit, drop(executiveagency) rename(_cons="ATE: I (Alt. Panel 1)")\ ///
			ccrip, drop(executiveagency) rename(_cons="ATE: I (Alt. Panel 2)")) ///
		  ,  bylabel(Regular Budget) ///
		  ||,                        ///
          nokey xline (0, lcolor(black) lwidth(thin) lpattern(dash)) grid(w) ciopts(recast(rcap)) ///
		  nooffsets msize(medsmall) ///
		  order("ATE (Full Panel)" "ATE (Alt. Panel 1)" "ATE (Alt. Panel 2)" . ///
                "ATE: E (Full Panel)" "ATE: E (Alt. Panel 1)" "ATE: E (Alt. Panel 2)" . ///
                "ATE: I (Full Panel)" "ATE: I (Alt. Panel 1)" "ATE: I (Alt. Panel 2)" ) ///
		  byopts(note("Point Estimates and Corresponding 95% Confidence Intervals", j(right) place(seast) size(vsmall)) ///
		  title ("Figure SI-5B. 1921 Budget and Accounting Act Average Treatment Effects on " ///
		  "Legislative Budget Control: Comparison of Alternative Agency Panels", size (med)span)) 
		  
graph save "C:\Users\Jin\Dropbox\BACA paper\Graphs\Governance\gph\Figure SI-5B.gph", replace
graph export "C:\Users\Jin\Dropbox\BACA paper\Graphs\Governance\Figure SI-5B.png", replace	

	  
********************************************************************************************************************************************************************
********************************************************************************************************************************************************************
********************************************************************************************************************************************************************

		  


*** VIII. ESTIMATE EFFECTS OF BAA REFORMS ON BUDGETARY STABILITY IN NATURAL LOGARITHMS AS DEPENDENT VARIABLE ***



*** ESTIMATE EXECUTIVE BUDGET STABILITY USING SAMPLE EXCLUDING ONE-SIDED AGENCIES***

absdid lnexecbudstabletot if onesidedagencies==0, tvar(bureauofbudget)  xvar(presidentparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
agencyheadstability realgnpgrowth realfeddeficitgnp lnagencyage) sle
estimate store ateestp
*
*
absdid lnexecbudstabletot if onesidedagencies==0, tvar(bureauofbudget)  xvar(presidentparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
agencyheadstability realgnpgrowth realfeddeficitgnp lnagencyage)  yxvar(executiveagency) sle 
*
estimate store estip

lincomest _cons + executiveagency
estimate store estep

*
*
*
absdid lnexecbudstablereg if onesidedagencies==0, tvar(bureauofbudget)  xvar(presidentparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
agencyheadstability realgnpgrowth realfeddeficitgnp lnagencyage) sle
estimate store ateesrp
*
*
absdid lnexecbudstablereg if onesidedagencies==0, tvar(bureauofbudget)  xvar(presidentparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
agencyheadstability realgnpgrowth realfeddeficitgnp lnagencyage)  yxvar(executiveagency) sle
*
estimate store esrip

lincomest _cons + executiveagency
estimate store esrep

*
*
*

*** ESTIMATE CONGRESSIONAL BUDGET STABILITY USING SAMPLE EXCLUDING ONE-SIDED AGENCIES***

absdid lncongbudstabletot if onesidedagencies==0, tvar(bureauofbudget)  xvar(housemajorityparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
appropcommchairstabilityest realgnpgrowth realfeddeficitgnp lnagencyage) sle
estimate store atecstp
*
absdid lncongbudstabletot if onesidedagencies==0, tvar(bureauofbudget)  xvar(housemajorityparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
appropcommchairstabilityest realgnpgrowth realfeddeficitgnp lnagencyage)  yxvar(executiveagency) sle
estimate store cstip

lincomest _cons + executiveagency
estimate store cstep
*
*
*
absdid lncongbudstablereg if onesidedagencies==0, tvar(bureauofbudget)  xvar(housemajorityparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
appropcommchairstabilityest realgnpgrowth realfeddeficitgnp lnagencyage) sle
estimate store atecsrp
*
absdid lncongbudstablereg if onesidedagencies==0, tvar(bureauofbudget)  xvar(housemajorityparty presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
appropcommchairstabilityest realgnpgrowth realfeddeficitgnp lnagencyage)  yxvar(executiveagency) sle
estimate store csrip

lincomest _cons + executiveagency
estimate store csrep

*** Creating Appendix Plots for Budget Stability Models***
*** Figure SI-5C: Executive Budget Stability Models: Comparison of Alternative Agency Panels***
coefplot (ateest, rename(_cons="ATE (Full Panel)")\ ///
			ateestt, rename(_cons="ATE (Alt. Panel 1)")\ ///
			ateestp, rename(_cons="ATE (Alt. Panel 2)")) ///
         (este, rename((1)="ATE: E (Full Panel)")\ ///
			estet, rename((1)="ATE: E (Alt. Panel 1)")\ ///
			estep, rename((1)="ATE: E (Alt. Panel 2)")) ///
         (esti, drop(executiveagency) rename(_cons="ATE: I (Full Panel)")\ ///
			estit, drop(executiveagency) rename(_cons="ATE: I (Alt. Panel 1)")\ ///
			estip, drop(executiveagency) rename(_cons="ATE: I (Alt. Panel 2)")) ///
		  ,  bylabel(Total Budget) ///
		  ||                       ///
		 (ateesr, rename(_cons="ATE (Full Panel)")\ ///
			ateesrt, rename(_cons="ATE (Alt. Panel 1)")\ ///
			ateesrp, rename(_cons="ATE (Alt. Panel 2)")) ///
         (esre, rename((1)="ATE: E (Full Panel)")\ ///
			esret, rename((1)="ATE: E (Alt. Panel 1)")\ ///
			esrep, rename((1)="ATE: E (Alt. Panel 2)")) ///
         (esri, drop(executiveagency) rename(_cons="ATE: I (Full Panel)")\ ///
			esrit, drop(executiveagency) rename(_cons="ATE: I (Alt. Panel 1)")\ ///
			esrip, drop(executiveagency) rename(_cons="ATE: I (Alt. Panel 2)")) ///
		  ,  bylabel(Regular Budget) ///
		  ||,                        ///
          nokey xline (0, lcolor(black) lwidth(thin) lpattern(dash)) grid(w) ciopts(recast(rcap)) ///
		  nooffsets msize(medsmall) ///
		  order("ATE (Full Panel)" "ATE (Alt. Panel 1)" "ATE (Alt. Panel 2)" . ///
                "ATE: E (Full Panel)" "ATE: E (Alt. Panel 1)" "ATE: E (Alt. Panel 2)" . ///
                "ATE: I (Full Panel)" "ATE: I (Alt. Panel 1)" "ATE: I (Alt. Panel 2)" ) ///
		  byopts(note("Point Estimates and Corresponding 95% Confidence Intervals", j(right) place(seast) size(vsmall)) ///
		  title ("Figure SI-5C. 1921 Budget and Accounting Act Average Treatment Effects on " ///
		  "Executive Budget Stability: Comparison of Alternative Agency Panels", size (med)span)) 
		  
graph save "C:\Users\Jin\Dropbox\BACA paper\Graphs\Governance\gph\Figure SI-5C.gph", replace
graph export "C:\Users\Jin\Dropbox\BACA paper\Graphs\Governance\Figure SI-5C.png", replace		  

*** Figure SI-5D: Legislative Budget Stability Models: Comparison of Alternative Propensity Weighting Schemes***
coefplot (atecst, rename(_cons="ATE (Full Panel)")\ ///
			atecstt, rename(_cons="ATE (Alt. Panel 1)")\ ///
			atecstp, rename(_cons="ATE (Alt. Panel 2)")) ///
         (cste, rename((1)="ATE: E (Full Panel)")\ ///
			cstet, rename((1)="ATE: E (Alt. Panel 1)")\ ///
			cstep, rename((1)="ATE: E (Alt. Panel 2)")) ///
         (csti, drop(executiveagency) rename(_cons="ATE: I (Full Panel)")\ ///
			cstit, drop(executiveagency) rename(_cons="ATE: I (Alt. Panel 1)")\ ///
			cstip, drop(executiveagency) rename(_cons="ATE: I (Alt. Panel 2)")) ///
		  ,  bylabel(Total Budget) ///
		  ||                       ///
		 (atecsr, rename(_cons="ATE (Full Panel)")\ ///
			atecsrt, rename(_cons="ATE (Alt. Panel 1)")\ ///
			atecsrp, rename(_cons="ATE (Alt. Panel 2)")) ///
         (csre, rename((1)="ATE: E (Full Panel)")\ ///
			csret, rename((1)="ATE: E (Alt. Panel 1)")\ ///
			csrep, rename((1)="ATE: E (Alt. Panel 2)")) ///
         (csri, drop(executiveagency) rename(_cons="ATE: I (Full Panel)")\ ///
			csrit, drop(executiveagency) rename(_cons="ATE: I (Alt. Panel 1)")\ ///
			csrip, drop(executiveagency) rename(_cons="ATE: I (Alt. Panel 2)")) ///
		  ,  bylabel(Regular Budget) ///
		  ||,                        ///
          nokey xline (0, lcolor(black) lwidth(thin) lpattern(dash)) grid(w) ciopts(recast(rcap)) ///
		  nooffsets msize(medsmall) ///
		  order("ATE (Full Panel)" "ATE (Alt. Panel 1)" "ATE (Alt. Panel 2)" . ///
                "ATE: E (Full Panel)" "ATE: E (Alt. Panel 1)" "ATE: E (Alt. Panel 2)" . ///
                "ATE: I (Full Panel)" "ATE: I (Alt. Panel 1)" "ATE: I (Alt. Panel 2)" ) ///
		  byopts(note("Point Estimates and Corresponding 95% Confidence Intervals", j(right) place(seast) size(vsmall)) ///
		  title ("Figure SI-5D. 1921 Budget and Accounting Act Average Treatment Effects on " ///
		  "Legislative Budget Stability: Comparison of Alternative Agency Panels", size (med)span)) 
		  
graph save "C:\Users\Jin\Dropbox\BACA paper\Graphs\Governance\gph\Figure SI-5D.gph", replace
graph export "C:\Users\Jin\Dropbox\BACA paper\Graphs\Governance\Figure SI-5D.png", replace	

	  
********************************************************************************************************************************************************************
********************************************************************************************************************************************************************
********************************************************************************************************************************************************************


		  


*** IX. ESTIMATE EFFECTS OF BAA REFORMS ON EXECUTIVE-LEGISLATIVE BUDGETARY COHERENCE IN NATURAL LOGARITHMS (+1) AS DEPENDENT VARIABLE ***




*** ESTIMATE EXECUTIVE-CONGRESSIONAL BUDGET COHERENCE USING SAMPLE EXCLUDING ONE-SIDED AGENCIES ***

absdid ln1execbudcoherencetot if onesidedagencies==0, tvar(bureauofbudget)  xvar(presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
unifiedpartygovt sharedtenureest realgnpgrowth realfeddeficitgnp lnagencyage) sle  
estimate store atebctp
*
absdid ln1execbudcoherencetot if onesidedagencies==0, tvar(bureauofbudget)  xvar(presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
unifiedpartygovt sharedtenureest realgnpgrowth realfeddeficitgnp lnagencyage) yxvar(executiveagency) sle
estimate store bctip

lincomest _cons + executiveagency
estimate store bctep
*
*
*
absdid ln1execbudcoherencereg if onesidedagencies==0, tvar(bureauofbudget)  xvar(presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
unifiedpartygovt sharedtenureest realgnpgrowth realfeddeficitgnp lnagencyage) sle 
estimate store atebcrp
*
absdid ln1execbudcoherencereg if onesidedagencies==0, tvar(bureauofbudget)  xvar(presidentialstabilityadministrat housemajoritypartystability senatemajoritypartystability ///
unifiedpartygovt sharedtenureest realgnpgrowth realfeddeficitgnp lnagencyage) yxvar(executiveagency) sle
estimate store bcrip

lincomest _cons + executiveagency
estimate store bcrep
*
*
*
*** Figure SI-5E: Budget Coherence Models: Comparison of Alternative Agency Panels***
coefplot (atebct, rename(_cons="ATE (Full Panel)")\ ///
			atebctt, rename(_cons="ATE (Alt. Panel 1)")\ ///
			atebctp, rename(_cons="ATE (Alt. Panel 2)")) ///
         (bcte, rename((1)="ATE: E (Full Panel)")\ ///
			bctet, rename((1)="ATE: E (Alt. Panel 1)")\ ///
			bctep, rename((1)="ATE: E (Alt. Panel 2)")) ///
         (bcti, drop(executiveagency) rename(_cons="ATE: I (Full Panel)")\ ///
			bctit, drop(executiveagency) rename(_cons="ATE: I (Alt. Panel 1)")\ ///
			bctip, drop(executiveagency) rename(_cons="ATE: I (Alt. Panel 2)")) ///
		  ,  bylabel(Total Budget) ///
		  ||                       ///
		 (atebcr, rename(_cons="ATE (Full Panel)")\ ///
			atebcrt, rename(_cons="ATE (Alt. Panel 1)")\ ///
			atebcrp, rename(_cons="ATE (Alt. Panel 2)")) ///
         (bcre, rename((1)="ATE: E (Full Panel)")\ ///
			bcret, rename((1)="ATE: E (Alt. Panel 1)")\ ///
			bcrep, rename((1)="ATE: E (Alt. Panel 2)")) ///
         (bcri, drop(executiveagency) rename(_cons="ATE: I (Full Panel)")\ ///
			bcrit, drop(executiveagency) rename(_cons="ATE: I (Alt. Panel 1)")\ ///
			bcrip, drop(executiveagency) rename(_cons="ATE: I (Alt. Panel 2)")) ///
		  ,  bylabel(Regular Budget) ///
		  ||,                        ///
          nokey xline (0, lcolor(black) lwidth(thin) lpattern(dash)) grid(w) ciopts(recast(rcap)) ///
		  nooffsets msize(medsmall) ///
		  order("ATE (Full Panel)" "ATE (Alt. Panel 1)" "ATE (Alt. Panel 2)" . ///
                "ATE: E (Full Panel)" "ATE: E (Alt. Panel 1)" "ATE: E (Alt. Panel 2)" . ///
                "ATE: I (Full Panel)" "ATE: I (Alt. Panel 1)" "ATE: I (Alt. Panel 2)" ) ///
		  byopts(note("Point Estimates and Corresponding 95% Confidence Intervals", j(right) place(seast) size(vsmall)) ///
		  title ("Figure SI-5E. 1921 Budget and Accounting Act Average Treatment Effects on " ///
		  "Executive-Legislative Budget Coherence: Comparison of Alternative Agency Panels", size (med)span)) 
		  
graph save "C:\Users\Jin\Dropbox\BACA paper\Graphs\Governance\gph\Figure SI-5E.gph", replace
graph export "C:\Users\Jin\Dropbox\BACA paper\Graphs\Governance\Figure SI-5E.png", replace	






